ML v}  X c0C)HCCH Mhhݩh `eCDiCD`  RyHP   * 1H0芢@) Y0.Ș` i #(PMR\ \b Pgi 0  % @ / ՠ`d   0DDԝLM:11CSTMCCCCC1C71C70C1C1XFAC1C1CSLOOCLSDHFLADSFLCCLKOFVCNVERBNOUNSC6MC}COKCCECIHHHOXPAINCCCODCD } } !"#$%&'()}*+,-./01234@56789 }:;<  A P+6.7A<A,,6-@:7<,,:S:D @PA } ]%6-F:A`,%F:Aa,$AV@-%@1%@$6KF:&,O ]%@% T6-?:AH<A,,BB }A8AJB7tAT @u $ AH$ -6-?:<,  }6-?:<,$,2@%- )2,$9 6-&/(I don't understand. Try again.9 @P(Tha }t is impossible.$(%(There isn't enough room here.($(It isn't here.$6-?:<<<,$6-?:<<<,}$ @$$' ' ( @P"6-$+@:7<,,&@e,%"$' 6- @(On base ground}s.$# (Payload prep. center.#$$!(South of Headquarters.$$ (North of Security. $!( Storag}e shed.$"(Security office.$#( Headquarters.$$(Maze of tunnels.$%%"(Materials distrib}ution.%$&(Instrument bay.$'(Escape bunker.$(( Pipe trunk.$)# (Fuel pumping station.#}$* + @$+Y' @B-+(Congratulations!V(& The bomb has been deactivated!Y,8' }@BAR8@E@F@H-(ԠƠš.--(% The bomb explodes, killing you/1'( } and destroying the shuttle!1 @I0K0(( Before you can act, a guard appearsK( and shoots you DEAD!1* ( } ŭǠ* A2' "6- @U3+ 6-%%(?:>>>> What next" @, @P04 =6-B:,J(@8"*+4I)}4Q,@X9I0"*?:<(6-?:A6:,$4\)4]>(Refer to it by color.H }@PA? @i?(?:<:,F @'S6.7<%,L*( -$(Your location:*-M6-&@d }@)@)@0@1@)@)@)@)@3@4@2@5@6@6@6!}@7@6@6@6@6@6@6@8@9@@@ANH -( You can go: &"}-77%<%,0?H(7<, O P76-?:<,6-?:<,-1( You see: 76-QW -%6-@:7%<#}%,,&@d,68#AG%<"H-@O(W6-%R4  "-@4(Nothing interestingS "$}6- @T @PU*( @-*( You have: VS 6--'6-@:7<,,&@d.6:#AG%}%>"D-K(S6-%W(  "-@((NothingX @PY@((Type to save, to quit,&}40Y9=+@ZVAY@4<(Position Save: isk or ape@V0D*0T@P[0 @6. '}D1:SAVE.DAT'4T06.C:\TAYBBr&=67A<A,.G @'T67<%,.]n-A%(}6@.(7<%@,2 9(@(G(T(@a(@n(@^6AY@4,)}BBA6 @U_K6-&@d @#&(*4A.6.B46-> @#K(@"`( @$(*}@"aAAAA@@A@@A A@@A+}AAAAA@AAb//&@"A"AAA!c(Seems,} ordinary.$d(Looks dangerous.$e47A<A,4?1(Has a red light!4$f(It's deactivated.$g-}(Paint covers lens.$h87A<A,005(Not much paint left.8$i( It's empty!$j1.(&Says: Cameras o.}ff. Back after launch.1$k# (Door is securely locked.#$l(It's unlocked.$m(Says: 7<,$n(Says: /}7<,$o='(Says: WARNING - LIQUID OXYGEN:(EXTREME COLD=$p.?:<},.OV @(' 4N$(Bolts won't let you.'$0VAa( 6.?6- @#((@!R67?}%<%,.W-67@r<@r,.W>67%<%,.YH A#R @(# @%#4P)4Q@D @ @}0G@  @#(@"+7<,0K((There's no keyhole!+$96-?:<67%<%,.BH @((What a nice color!$))(?:(L}?:<$*4Q)4T'(It's already cut.*$4D)4J)4KAM}4PA0S@ 767@d<@d,.T-67%<%,.T7 A AH @!N}S67%<%,.Q-67@V<@V,.Q@678,<8,,.RS678,<8,,.S( ' @(You hear a sirenO}!67A<A,.*$7A<A,4?$ 6- @D--"P}[ @AR2(}Tom Hudson's[($ ŠƮ®@$( (C)1984 ANALOG CompuQ}ting*-@( Ǡhh;A,;@,;@$,;@,;@,;@h,;@,;@ ,R};@,c<9@,;@,;@ ,;@,;@,H6.Okay.c6.You don't have that.F -6S}7,.W!67,.H0H:, ?P;67,.GF67,.I 7<,47<,Aff6.\CAMACANCNOTDSCIEKEYFDOOGWHIHGT}RAIBLUJPINKSCRLWREMHATNBAGPPANRWIRSCRAUCABVSIGXCLOYBOL[BUT\PAP]NN6.DEXAALOOATAKBGETBDROCLEACOPEDUNLESPRFPAIFREAGUNSHREMIU}MOVJPUSKPREKCUTLb6.NSEWUDIQ6-A'6-C:,/6-%86-C:,A6-C:,J6-C:,V6-A\6-b6-Z #A5V}67,.?)67A,.?267,.B-AvF"V67<%B:,,.Z [*67A<A,.2??????11?????I96W}.7A!,M-A6ASQ"W[ [ -/(! Press Ԡ to begin new game.[(' Press Π to restoreX} old game.F:B2y,"@F:B2y,"A( A%]AY@4&-@ C(Load fY}rom isk or apeG]0D*0TA(HAYBBr% A(76. D1:SAVE.DAT?4TH6.C:/Z} B'g/-A%6@N 67<%@,.! 967A<A,.@GNK [}46.7A<A,> @'K6.7<%,% 6-AY@4% @;;40000,0,0,1,2,3,\}4,5,6,7,8,9,10,12,14,15,16,60,709,710``ADFBA,BB?BA?N,C?H???UF,DLAEK,EEIFD,FAKFE,GHKHG,HCGHG,IE?????CV,JK????VD,KF?GD??G,L]}?D????AJ]]MNMNQ,NMRNMB?A,OSSTO,P?????SAE,QMRQQ??AL,RN?SQ??AGHI,SORTOP,TTSUO,UU??TC?NX[,V?X??J?GHI..W?????ZAPK,XV?????^}AU,Y??ZX??M,Z???Y??GHIdd104,104,133,206,104,133,205,104,133,204,104,133,203,169,0,133,213,162,25,202,240,42,24,165,205_}bb105,4,133,205,165,206,105,0,133,206,24,160,0,177,203,209,205,208,231,200,177,203,209,205,208MM224,200,177,203,209,205,`}208,217,200,177,205,133,212,96,169,0,133,212,96gg104,104,133,206,104,133,205,104,133,204,104,133,203,169,0,168,133,213,17a}7,203,133,207,104,104,168GG136,48,10,165,207,209,205,208,247,200,132,212,96,169,0,133,212,96ZZ104,104,141,1,2,104,141b},0,2,173,48,2,133,203,173,49,2,133,204,160,24,169,130,145,203ZZ169,0,141,243,2,96,0,72,138,72,169,0,162,10,141,10,212,141c},24,208,142,23,208,230,20855165,208,41,16,74,74,74,141,1,212,104,170,104,64cc104,104,104,170,165,88,133,203,165,89,13d}3,204,216,24,202,48,15,165,203,105,40,133,203,165,204CC105,0,133,204,24,144,238,160,159,169,0,145,203,136,208,251,96e}Surveillance cameraPainted cameraSpray can NoteScissors Keys DoorWhite buttonGrf}ay buttonBlue paperPink paperScrewdriver Wrench HatchOpen hatch BagBag with gapig}ng hole Metal panel  Wire Severed Wire Wooden crate Closed cabinetOpen cabinet Sign Ch}lockBroken clock BoltsD:VANDENBG.BASWooden crate Closed cabinetOpen cabinet Sign C80100 ; NOUN/VERB DECODER0105 ;0110 ; Syntax: N=USR(ML,TL-4,NL)0115 ; ML=addr of this routine0120 ; TL=addr of lookup tablj}e0125 ; NL=addr of current noun/verb0130 ;0135 ; Program equates0140 ;0145 NOUN=$CB ; noun addr pointer0150 TABLE=$CD k}; table addr pointer0155 NRET=$D4 ; BASIC return addr0160 ;0165 PLA ; # arguments0170 PLA l}; msb of table addr0175 STA TABLE+10180 PLA ; lsb0185 STA TABLE0190 PLA ; msb of m}noun addr0195 STA NOUN+10200 PLA ; lsb0205 STA NOUN0210 LDA #$000215 STA NRET+1 ; n}zero msb0220 LDX #$19 ; noun/verb count0225 NEXT DEX0230 BEQ NOPE ; illegal entry0235 CLC0240 o} LDA TABLE ; +5 to pointer0245 ADC #$040250 STA TABLE0255 LDA TABLE+10260 ADC #$000265 Sp}TA TABLE+10270 CLC0275 LDY #$00 ; init index0280 LDA (NOUN),Y ; get 1st char0285 CMP (TABLE),Y q}; equal?0290 BNE NEXT ; no; next noun0295 INY ; in-line for speed0300 LDA (NOUN),Y ; try 2nr}d char0305 CMP (TABLE),Y0310 BNE NEXT0315 INY0320 LDA (NOUN),Y ; try 3rd char0325 CMP (TABLE),s}Y0330 BNE NEXT0355 INY ; must be legal0360 LDA (TABLE),Y ; get iden #0365 STA NRET ; gt}ive to BASIC0370 RTS ; and return0375 NOPE LDA #$00 ; 0=illegal entry0380 STA NRET ; give tou} BASIC0385 RTS ; and returneturn0375 NOPE LDA #$00 ; 0=illegal entry0380 STA NRET ; give to,N@  )?HI Y0`HIJH) * J j * hJJJ )HJ h i     w} YS S0 i`΢ϣ߳H J3xj2hx} 1 |9 ӭ45(420 * (0241өX.`  R *i)Lvw  ~*Py}E 5 LN(G E  r s k rsrL ( E LO(0d( L iE0O +)$IC  H S8 z}q p h   j 8no CDLQ CFl M  LO Ri)Llk2'")*F{}$F$F$F$F$ 5 )ШF/Șl]kpqС,LQ/A! Ti)Zlk@ ܬ/i)(")")k|}$F$F$F 5$/L /lF@jj(LNkle$$%8(k()` R 8 ELO Ri)^>jf | NrC s }} ) vw5g   enfo Glvw LQ@iLm>j FL ~Jjjjii p qEh~}jlrs`LQ:$ȱ$@+[_#{ 8  Խut! ai 8   E I   ] C} H h    ˰ 8  N   Lm E  ,  [ `LQ ,/ 8 ~/  Ơ? ѩ}/  [ /Lj0?MoLn FjMqLp NklLOLQnLoMlNLO R"(+}ըHH`Q R!!  % !   / .   FȑF! /GF \H"+0+* }! F tLQnm: J~nTF1F  *n+)5! n (, n)1JJJn(n*o} I ,0  ci a oF? @ , 8,0 ʩ0H Eh   i}  D ]DmmFLQvtu`*&!*@h ] 0 ^0` c 0l$$%}()()%*&J%H,@hH hH@,h $% 8i8$(%)0hhH ]h`() c 0H c 0 h}`hhh&JJ ](ll  LQ0  /qnoHH 9 9 H H  I9  9 } Nd EH  Q8 o n  FnoL HII/ Ih8`h`Lnon`no`u F }E VEhLO/luF l0BF/lɜɛ׽hE N  b VFL FREE SECTORS C} H) *Fh ):FȽ F FC IH' 0 d  i:Fȩ/F.l`CD/08HDIC}IHȰ/F`ȱ$>.+.i ȱ$:刄H !A \ Hȱ$*?ȝ 2. ? [_{ ,0}-:) 0$:>WI  IТ,LQH  0hLd ~ t u`C ?( 0(C.` E } R =! .ti S0N EE D XC )0')AY  )ע ? 0E088FG \o}n  (HhLcL3 iJ i Lqp 0=rspnqopqlk`jZj0  j FL`H}FhȑFȽlFi0 h FFLFpvqwgneofLF pq7  G0i 0 FJJh1FqȱFpȱFk`B!}08`hEE D 8. =D}tui( TʩL`b!)    cȌaȌd b`aab}H8 hdaHcd8 cH hHH  \h hc` =Hh I8ih( t  ( t(!` L\}CJfCJfCJfCDfC` a  HII  INdh  `h  `n)8jHniPoijIjFIjFIjh` a} I 38  8H0 I  ' H LQ8j Y  8j NdY  &I &I &IHeH.p}Iiq  `!.莿 2Jjj }.m Ȉ!m FG` ɩLQ z } e Hi04 \ Ȍ  8 i h !`I0 `C Y8.`DOS SYS} I  ` ~ݩ.C/`ba.m۩mѤC9 `C L] H  ,- '0 l }, BLVDE`D1:AUTORUN.SYS8hhJ ȱHȱIȱBȱDȱEeeHHLV)  }1*  ,,p-  0 I &  '0   Lw)l, 0  I&LD1:MEM.SAV}E:D1:DUP.SYS,CA+!Af>Rʼn)YX(8$Fܻ>¹k Ty} D  C D     )16CS S)  C)D1 p p }0 C9DI pCDL~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` )} `A! d߰")-݆ "  $G@LLL&0") $G%}H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0})8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH)}  hyhyB q L> Lm JJ  Ln*` dB%'}8  H H` 1 { LL   !L     Hh SY?  q  1L}  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF } G) *Gȩ GȽG GȌd q q G`  8   0G  `D}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y}`piH n0)բY? 08`0 }  0$L GGȽG L `8L`L}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR}1LJ舩9GIH`LJJ`HGHh l`} S gL   8 rii `дCDCG W  }C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}} HE |||||DOS DOSDOS SYS }}}}CDOS SYS} 0`BDELV !B }`LVUQ   ]   TU J ]L!T  #      TU } L ? .  t`GBJ V~DEHI B V0dV}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh}DEL8HI   0 HI,0 0  9 .G VLO},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI} V0 0`B;DELV䌚 !B y`@ʆ v s? F0Ξ05: [ BDEHI} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO }STILL RUN DOS B;DE J V (` 9 V⪍ ઍ  -}LLu DEHILV 9 .l 9 .l  `` s$B VBH}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL}1 3u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e}1i1232435ޥ<<8}0100 ; CHARACTER SEARCH ROUTINE0105 ;0110 ; Syntax: X=USR(ML,SVT,V,R)0115 ; ML=addr of this routine0120 ; SVT=addr of $ t }o be searched0125 ; V=addr of search character0130 ; R=# bytes to search0135 ;0140 ; Program equates0145 ;0150 CADR=$CB } ; char addr pointer0155 TABLE=$CD ; verb table pointer0160 CHAR=$CF ; character buffer0165 BRET=$D4 ; BASIC return add }r0170 ;0175 PLA ; # arguments0180 PLA ; msb of table addr0185 STA TABLE+10190 } PLA ; lsb0195 STA TABLE0200 PLA ; msb of verb addr0205 STA CADR+10210 PLA } ; lsb0215 STA CADR0220 LDA #$000225 TAY0230 STA BRET+1 ; zero msb0235 LDA (CADR }),Y ; get the char0240 STA CHAR ; save for later0245 PLA ; msb of range (ignore)0250 }PLA ; lsb0255 TAY ; use as the index0260 NEXT DEY0265 BMI NOPE ; must be illegal }0270 LDA CHAR ; get char0275 CMP (TABLE),Y ; match?0280 BNE NEXT ; no; try another0285 } INY ; yes; give position0290 STY BRET ; to BASIC0295 RTS ; and return0300 NOPE L }DA #$00 ; 0=char not found0305 STA BRET ; give to BASIC0310 RTS ; and return300 NOPE L s0100 ; DLI/BLINK ROUTINE0105 ;0110 ; Syntax: USR(DLI,DLI+X)0115 ; DLI=addr of this routine0120 ; X=offset to DLI handler}0125 ;0130 ; Program equates0135 ;0140 COLPF1=$D0170145 COLPF2=$D0180150 WSYNC=$D40A0155 SDLSTL=$02300160 VDSLST=$0200}0165 CHACTL=$D4010170 CHACT=$02F30175 BUFFER=$CB0180 BLINCT=$D00185 ;0190 ; First set up the DLI0195 ;0200 PLA } ; # arguments0205 PLA ; msb of DLI addr0210 STA VDSLST+10215 PLA ; lsb0220} STA VDSLST0225 LDA SDLSTL ; find start of0230 STA BUFFER ; display list0235 LDA SDLSTL+10240} STA BUFFER+10245 LDY #$18 ; mode line 200250 LDA #$82 ; DL instruction0255 STA (BUFFER),Y}0260 LDA #$00 ; turn off0265 STA CHACT ; inverse video0270 RTS0275 BRK ; mark e}nd of init0280 ;0285 ; This is the actual DLI handler0290 ;0295 PHA ; save accumulator0300 TXA0305} PHA ; save X0310 LDA #$00 ; black bkgrnd0315 LDX #$0A ; white chars0320 STA WS}YNC0325 STA COLPF20330 STX COLPF10335 INC BLINCT ; Blink cursor0340 LDA BLINCT0345 AND #$10}0350 LSR A0355 LSR A0360 LSR A0365 STA CHACTL0370 PLA ; restore A and X0375 TA}X0380 PLA0385 RTI ; back to BASIC STA CHACTL0370 PLA ; restore A and X0375 TA90100 ; SCREEN ERASE SUBROUTINE0105 ; CLEARS IN 4-LINE BLOCKS0110 ;0115 ; Syntax: X=USR(ML,ST)0120 ; ML=addr of this routi}ne0125 ; ST=starting line number0130 ;0135 ; PROGRAM EQUATES0140 ;0145 BUFFER=$CB ; scr address buffer0150 SAVMSC=$58 ;} screentop pointer0155 ;0160 PLA ; # arguments0165 PLA ; msb of line#; ignore0170 } PLA ; lsb0175 TAX ; save in x-register0180 LDA SAVMSC ; get screen0185 STA BU}FFER ; address0190 LDA SAVMSC+10195 STA BUFFER+10200 CLD ; clear decimal mode0205 }CLC0210 ADD40 DEX ; find window addr0215 BMI CLEAR0220 LDA BUFFER ; add 400225 ADC #$28}0230 STA BUFFER0235 LDA BUFFER+10240 ADC #$000245 STA BUFFER+10250 CLC0255 BCC ADD40}0260 CLEAR LDY #$9F ; clear 4 lines0265 LDA #$00 ; space char0270 SPACE STA (BUFFER),Y0275 DEY02}80 BNE SPACE0285 RTS 4 lines0265 LDA #$00 ; space char0270 SPACE STA (BUFFER),Y0275 DEY02")A ;@,2 +2( PUT DISK CONTAINING DOS IN DRIVE(THEN PUSH }(..@@ D:AUTORUN.SYS2""6@@p<*@ @PF@( AL}L DONE!P^^255,255,0,6,142,6,162,0,189,26,3,201,69,240,5,232,232,232,208,244,232,142,105,6,189,26,3Zii133,205,169,107,15}7,26,3,232,189,26,3,133,206,169,6,157,26,3,160,0,162,16,177,205,153,107,6,200,202djj208,247,169,67,141,111,6,169,6,141,112},6,169,11,141,106,6,96,172,106,6,240,9,185,131,6,206,106,6,160nii1,96,138,72,174,105,6,165,205,157,26,3,232,165,206,157,26},3,104,170,169,155,160,1,96,7,0,251,243,51xgg246,67,6,163,246,51,246,60,246,76,228,243,0,32,32,32,32,32,32,32,32,32,84,82,}65,84,83,58,68,34,7885,82,226,2,227,2,0,6,-1D:CHECKBK1.BAS0,246,76,228,243,0,32,32,32,32,32,32,32,32,32,84,82,I  MlRRRD@ ,;@,9@,,6-C:},%@'-@'"#%' RR104,104,104,162,255,160,58,202,208,9,136,208,6,170,202,138,208,241,96,1}42,10(212,142,22,208,24,144,2352%-A6A"!% <..104,169,6,170,160,13,32,92,228,96,0,12,0FCC}174,12,6,165,20,201,7,208,11,169,0,133,20,232,224,2,208,2,162P--0,189,10,6,141,199,2,142,12,6,76,95,228Z6-?:A6,}dI +@AYI6-F:A`,%AV$F:Aa,%@n?&@@q+%@@?%@}@xm%@@+%@@?%@@eV%@F:A`,m%@ F:Aa,'}A@'AR@P@'-@%6( MICROCHECKH-@(@P(D-@%}@$( 6-@%@D( A-@@((Copyright 1984:-@@A(byC}-@@1(@CLAYTON WALNUMCAY@4(%@#@"(6-?:<@,* +AY}*%D:MENUD:CHECKBK2.BASUMCAY@4(%@#@"(6-?:<@,* +AY+'(x ROCOCONSOSTARSELECCHOICOLDROD } AP-@@'(@9-@@S(@ e-@@( }@ SEARCH CHECKS[-@@2(@BALANCE ACCOUNTD-@@[(@ UTILITIES(&-@ }@&(@END2p-@@<(@USE TO CHOOSE ITEMN-@ @"p(@PRESS } TO BEGIN<16-@6-@!-1(@=>F$6-F:B2y,$*@pP"A`Z; " }6-'@&@)+;AYd//AA A0A@APn% D:CHECKBOOx% D }:CHECKPRT% D:CHECKBAL% D:UTILITYAY@4/ 6-6-%@#"@/6-@ }-@@@ A -(@ -/(@=>AB2yh"@!-@@;(@ } ENTER CHECKSM-@@h(@ k"@!-@@<(@ SEARCH CHECKS }N-@@k(@g"@!-@@>(@BALANCE ACCOUNTP-@@ }g(@ ["@!-@@8(@ UTILITIESJ-@@[(@^"@ }!-@@2(@ENDD-@@^(@  @p-6-@6-@ }-AY%-AdA"!% WW72,138,72,238,159,6,174,159,6,189,128,6,141,10,212,141,26,208,224 },36,208,5,169,31!!141,159,6,104,170,104,64,31"10,0,112,0,0,I +@AYI6-F:A`,%AV$F: }Aa,%@6g&@A+%@A5?%@A4S%@A4g%@A4@S!}%@@+%@ @?%@!@S%@"@JE%@#@e.%@$F:A`,E!}%@%F:Aa,T9AA('A@9BBA^9AA'A9A!}Axh]AFA'AG@9AU@KAY@4]@ r @ D:!}CHECKBK3.BASAFA'AG@9AU@KAY@4]@ r @ D: jkBRKDINAMEADDRESSCITYBALANCEMONTHFILEBCHECKINSDAINSPRNODASNDDELAROCHOICOLDROBALANCYEA%} %} Ad@.@@K:@AdAUR%}A@ddA F:Ad,"AU@0(33F:Ad,"@9)F:Ad,"@`@02)%}@@$<##*********** BRKDIS **********FD6-F:@,!A',6-&A(8@DB7t% }P$Z##************SND1*************db%2A@@9-@AP= _2% }b$n$$*************DELAY************x-@A  $$$************INSDAT************l +@% } #-@@>(@ please insertP-@@l(@your data diskj-@@0(% }@ into drive #1B-@@"](@ Ӡ٠g @ j$$$************INSPRO************j +@% } #-@@>(@ please insertP-@@j(@ program diskO-@@0(@%} Ӡ٠: @ D AO%D:MENU$$***********INITIALIZE*********RR;@ ,;@ ,;@ ,%};@,;@,;@ ,;@c,K6-A@6-Ap'6-A036-A?6-A K6-@p""%}*************MENU***********S +@ #A5AR@GAU@S6-@u-@%}@+(@=-@@S(@new diske-@@u(@=>+-@@%}+(@new autoH%( USE TO PICK ITEM((H( PRESS TO BEGIN33F:B2y,@*F:B2y%},@Ap F:B2y,"@A"6-&@,AAA6/ 6-6-%@#%}"@/6-@@_"@!-@@7(@new diskI-@@_(@J_"%}@!-@@7(@new yearI-@@_(@T_"@!-@@7(@%}I-@@_(@new auto^;-@(@ +-@;(@=>h7-@%}@P -B2y@7 Apr Ap|##**********NEW DISK***********26. D:MONTH .DAT26. %} t + #AR@5A@PG-t((Šנˠ%};-@@1(ˠ̠Šġ; Ao +@ #-@@@(@please i%}nsert aR-@@o(@blank disk intob-@@+(@drive #1=-@@"X(@%} Ӡ٠b @ F AP1@@D:MENU<@F A`i +@ #-@%}@@(@ǠiAT@D1:> + #-@@7(ENTER YO%}UR NAME;>(&B:, @ &67B:,%@,.(!(ENTER YOUR STREET ADDRESS%((&B:, @ &67B:,%@%},.)"(ENTER CITY, STATE, AND ZIP&)(&B:, @ &67B:,%@,.X(>:A%,"AR@4-@%}@I(IS THIS CORRECT?L(P(T(X() @ )@:Y,*@:N,A0"@:N,A`&]+@% }@ D:NAME.DAT8(@E(@R(@]@0^ A`(>:A%,,AR>-%!}@@^(ENTER YOUR STARTING BALANCE:6.=:,DG-@B:,!7<,0.% =67B:,%@,..00%"}G AN# "B:,#67B:,%@,.00X*"B:,&@*67B:,%@,.0bRAR@(1(IS THIS YO%#}UR CORRECTG(STARTING BALANCE?J(R($l) @ )@:Y,*@:N,A v"@:N,A`Q A@(>:%$}A%,,-@@M(ENTER THE YEAR (EXAMPLE: 84)Q!! )!@A@I BAR@%%}"(@(IS THIS THE CORRECT YEAR?I(19) @ )@:Y,*@:N,Ap"@:N,A@S.@@%&} D:BALANCE.DAT;(@H(@S@5 +@ #A@5A@[-@%'}@4(@CREATING FILE FORF-@@[(@MONTH #-@)-@@%(}6(@B @[67@<@,.0u67@ <@ ,.=:, A@67@<@ ,.=:,@ @%)}@1(@END<@@ K+@@ D:AUTO.DAT<(@ENDG@%*}K e +@ #-@@=(@ ͠O-@@e(@̠=-@@%+}+(@Š/ 3 = A   ""**********NEW YEAR********** t + #AR@5A%,}@PG-t((ԠנҠ*! A!6. D:MONTH .DAT4F  A <%-}@@ D:MONTH01.DATF B>9@9@@ D:MONTH00.TMPH +@ %.}#A@5A@G-@@_(@ WORKING ONq-@@(@MONTH #R-%/}@)-@@6(@B @[67@<@,.0u67@ <@ ,.=:, Ap\6%0}7@<@ ,.=:,f @@p"@"4ENDA z$$7@<@,4*A%1}(@ AK@+@@<(@ENDG@K (@END%2}@u6@3@ D:MONTH00.DATu@2@D:MONTH00.TMP,MONTH00.DAT%3}V.@@ D:BALANCE.DAT;@H@V6-%@^@9@@%4} D:BALANCE.TMPF(@S(@^@u6@3@ D:BALANCE.DATu@2@%5}D:BALANCE.TMP,BALANCE.DAT   A ""***********NEW AUTO*********g +@ #-%6}@@<(@ ϠՠN-@@g(@ ϠŠ1-@@1(@נ%7}ſ) @ )@:Y,*@:N,A #"@:N, A#%D:MENUD  A9@@%8} D:AUTO.DATD@f +@ #-@@=(@ ǠO-@@f(@ Ϡ%9}$G+@@ D:AUTO.DAT<(@ENDG@. +@ 8s-@@+(@%:}נ=-@@W(@ Šk-@APo s B  A@L""*******WARNING SCREEN*%;}******VR-@@"(ǡ4-@@ R(THIS PROGRAM WILL DESTROY`c-@@3(ANY MICROCH%<}ECK DATA FILESE-@@c(THAT MAY BE ON YOUR DISK!jB-@#B('ӠçϠŠҠͧҠ%=}ՠt-@@)A@PK2A@@m2@A@@-@%>}@ ~uA72A@@@Y2@AA@@m-@@q %?}u Y%2G2@YA@P) @ )@:C,*@:M,%@}Ap# A"@:M,#%D:MENU$c +@ #-@@=(@ ͠O-@@%A}c(@ԠA-@@+(@Š/ 3 = AA  ***********NODAT**********s%B}@+@ .-@@G(@ ӠӠY-@@s(@ microcheck8-@%C}@-(@ ˡ1 5 8$ D:UTILITYӠY-@@s(@ microcheck8-@$;ij:H/Z/NNNNNNNNNN1N1N1N1N1N1N1N1N1N1N2NTEMPINRETRBACKSLCOROSVBEDTFLADATMEMCHNU)E}PAYEMONTHFILEAMOUNFLAGOLDAMNAMOUNTDICHNUMBALANCEDOLFORMACHECKDATEPAYEEMEMOSNDIBEGITDAYSNDDFLASTARENTR)F}ESELECOPTSEOPTIOAUTOCNFULLCOUNMONTHDATAUTOEDICNDELAEDTEMPFILEYEABRKDISNDCHNAMEADDRESSCITYAAUTOFILED)G} )H})I} !"#$%&'()*+,-.)J}/0123456789:;<=>)K}?@ABCDEFGHIJKLM)L}NOPQRSTUVWXY 6-@6-@'6)M}-@36-@?6-@K6-@W6-@c6-@o6-@ {6-@6-@6-@6-@)N}6-@6-@6-@6-@6-@%6-@6-@ % A $$***********DELAY**)O}************(-AP $2##*********** BRKDIS **********<8 6-F:,!A'&6-&A(,8B7t)P}F$P""*************IN*************Z" 6-6."AdAUd  "AR$n" "6--@8)Q}"( x" "6--@6"( AR"A` 6-%!AR $- -%&(>)R}:,#67<,.>:,- A% !(~6-&"%6. !6.7<, A!!*********** IN2 *****)S}******AK:#AdAU5A@dAA F:Ad,"AUAmQF:Ad,"@9)T})F:Ad,"@`)F:Ad,"A$)F:Ad,"AcAdAUm A )$""********** SND)U}1 ************& 2- #2&$**********SND2**********22@u!-@0% /2)V}2$""*************SND3***********"22A!-A% /22$,!!***********EDIT************)W}6,-@!&(,6-@ --( JJ -'(A = AMOUNT N = NUMBER--J(D = DAT)X}E P = PAYEET$ -$(M = MEMO E = END^ 6- hCC@:A,*@:D,*@:E,*@:M,*@:N,*@:P,)Y}APr --( |"@:A,A@"@:D,  A"@:E,6- A"@:)Z}M,  A"@:N,  A"@:P,  A"4 D:AUTO.DAT " A  A)[}- 6-A:, 6-&A:,&4DEP -6-66.=:A:,%, 6. 6.$-@1( $ A< 6)\}7,.67,.67,.-67@5,.<67@B,. --( $!!******** DOLFORMAT ********/-)]}B:,7<,0. ,67,..00/$ B:,"67%<%,.00&B:,"%67%<%,.00$:!!*********** DAT)^}E **********D+ -@!+( N/6-@36-1)AR/6-X" -(>:%A()_},6-" b*4Al4AvB:, A+ -+7<,20)7<,39A 6)`}7<,.6.A:, )A:,!A -@0( 6- $7 6-@2-@3'( --7 A)a}!!********** CHNUM *********** -@!*(6-@26--(0 1-)b} (>:%A(,&6-,6-0 4A" 4DEP67,. " A4AUTOAB:, A )c} .-B:,.7<,20)7<,39A    6.*-@2( $4& -@2( & A0)d}> ********* PAYEE **********H? 6-6-4DEP 56.DEPOSIT ? A R+ -@!+( )e} \AR1f) -(>:%A(,%6-@!) p4*A z< 6.B:, @!)f}+-B:,%@!867<,. <  -( AR $ ********* AMOUNT *********+ -@!+( )g} # 6-6-@16-#1# -(>:%A(,6-# 4*+),Ap4A)q}$BeVANDENBGBASB iDECODE ASMBJvDOS SYSB LOOK ASMB BLINK ASMB CLEAR ASMBMAKER B START BMENU B@UTILITY B`DCHECKBOO    6.-B:,00+7<,20)7<,39,*7<,0.A$7<,4.*"6-$ A 7<)r},4.*!A ")!AB:,!%AB:,"Ap$-B:,%67,.  . -)s}( B$86 -@1 ( ,AR6 A 0B ********** MEMO **********L+ -@!)t}+( V# 6-6-AR#1`) -(>:%A(,%6-@") j4*A`t)u}4*A`~: 6.B:, @"+-B:,%@"667,. :  - ($ ********** START *********)v}80 D:AUTO.DAT-8(RETURN = ENTER NEXT CHECKG -(SELECT = REVIEW)-@C(OPTION & SELECT = ENDG )w}!AdAU!B2y1!F:Ad,"*0 D:AUTO.DAT'6-1 A`F:B2y,"*(AF:B2y)x},"AF:B2y,"A0 A --(  6-((4DEP )4AUTO)40000A )y} , 6-A:,6-% !A,6- 6.=:,B:,"A 4 6-B:,-&!67,.0% .67,.46.)z}(     2! -!(OPTION = EDIT CHECK<I -@!+(=AdAUIB2y){}FF:Ad,"APF:B2y,"AZ APd'4AUTO*"6.AUTO' An%"A6)|}.CHECK% Ax) 6--@!(7,"-)(7,G67,. 67,. 67,.)67,.867@5,.G67@B)}},.67B:,%,.94AUTO6-%967$@c&@b<$@c,.5AR-(7,(-@15(7)~}@0, 6-% -(7,)4DEP 6.=:A:,%A:,,) A6.=:A:,&A:,,4 6. 6.-@1)}*( 4 A --( 0-B:,,67<,.>:@:7<,,%A`,0 [AG@R!-)}@!8(  >-[(PRESS RETURN TO CONTINUEAdAU F:Ad,"AUA@)}F:Ad,A0, - (-@! (7,,AG"BAR-(7,(-@15(7@0,;-B)}(7,,6.7<, A6) 6- 6-AQ) A0@ --( 6-J!A@T% -)}!(no checks to review% ^/  -%( / Ah&-@!&( ENTRY # rK -)}!(SELECT = NEXT CHECK'-9( OPTION = EDIT?-K(E = END| 6- A  6-%!A&&6.7$)}@c&@b<$@c,P6.7<,6.7<@4,66.7@5<@A,E6.7@B,P6.7<,--@2()}-@0#()--(-@1(-(-@3(AdAU F:Ad,"@BA)}F:B2y,"A`IF:B2y," 967$@c&@b<$@c,.?6-I A@ A@I -)}(7,-#(7@%,)-6(7@0,B-@!I(7,&&6.7$@c&@b<$@c,5AR-()}7,(-@15(7@0, -(7,6.7<@E, A&(Ap00 6. 67B:,&:@4,,b'( ((CONT-$AB'&l@AB- D:)}BALANCE.DAT4(;(@v4AUTO.DATAp"Ap D:AUTO.TMP3 -/(7$@c)}&@b<$@c,3 (ENDH!@3 D:AUTO.DATH@2D:AUTO.TMP,AUTO.DATB+ )}-,(@ n = new month2-B(m = menu "@:M,A %"@:N,6-6.% A" )}A@+ -&( please insert,-@( program disk -( Ӡ٠  A @%D:)}MENU5+ -!( ͠'-5(Ԡ+ -(Š ! + A  *******************)}******* INITIALIZE * **************************PP;@!,;,;@",;,;Ac,;,;)}@c,;@7,;,4DD;@",;@@,;,;,;,;,;,;,;@",>;A,;,;,HW6-)}AU6-A&'6-@-6-36-96-?6-K6-APQ6-W6-Ru6-A 6-A'6-A36-A)}@?6-AK6-A W6-A]6-c6-o6-Apu6-\36-@`6-A'6-@@36-Af)}226.(| |p,67,. 67@7,.,67@,.zl +@ #-@@)}>(@ please insertP-@@l(@your data diska-@@0(@ into drive #1B-)}@@"](@ Ӡ٠a = A'0# D:NAME.DAT*18=* D:B)}ALANCE.DAT%* 6-6- D:AUTO.DAT- 4END B#- A"P8 6-%.67)}$@c&@b<$@c,.8 A"0;+ AY;6-F:A`,%AV$F:Aa,%1%A0%)}!%)%1%E%@$@e.%@%F:A`,E%@&F:Aa,/ #A"!-AdA)}%"+/ 5572,138,72,152,72,169,10,162,0,160,56,141,10,212==141,24,208,142,24,208,140,23,208,104,168,104,170,104)},64 'A A'A 8AF'AU@8COLOR AND TIME QAA(!A)}3BBAE@ QAR$ 6 -6((.  --)}( 8 6 -6((B 5 -( # -5( L ; -)} (-@%"(.-@0;(V N -(-@0%($+-N( )}` E -(-3(EAY@4j 76. D:MONTH .DAT !-7( )} t '6-@06-6-'AQ~  -(  ; 4A6. D:AUTO.DAT(-@01(AUTO; A%@ ( B)}:,  -( ( A$0 ? -#7<,20)7<,39' --5( ? A$0   4 6.A:, )A:)},! #-*( 4 A$0 4 6-A:,")")")"*6-@04 A%   "6-@) A%  6-@1)} 167<,./ /!67<,.=:,--@01( 67<,. " A!p" B # 4END)}# A% 6-% 0&67$@c&@b<$@c,.0 A%P M !,6.7$@c&@b<$@c,76.7<,)}C6-@1M A' "*4 D:AUTO.DATA'`( A -%( START MONTH 7<,?1-@$A( (Y/N) 2  )}"@:N,Ap< @:Y,A&F - (P $6.0000$ D:AUTO.DATZ  4END*!6-d  )}4END A'n 67<,.7<,x -6.=:A:,&A:7@5,,,#6.' -6. 8 6-%.67$@c&@b<$@)}c,.8 A&P 6.7<, 2-@!(7,(AY@42 B )-@"( BALANCE:$) A)} A+ -&( NO microcheck,-A( DATA FILES ON 1 -( THIS DISK " '1 A!p B2A)}!-@P% /23 8B A!p :-@"#(auto file empty' + 0: A$ D:CHEC)}KBOO!-@P% /23 8B A!p :-@"#(auto file empty' + 0: A$ D:CHEC(